home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue59 / Arch / Sample / CustomerOrders.dpr < prev    next >
Encoding:
Text File  |  2000-06-05  |  1.6 KB  |  32 lines
  1. program CustomerOrders;
  2.  
  3. uses
  4.   Forms,
  5.   UnitCommonTypes in 'UnitCommonTypes.pas',
  6.   UnitFormBase in 'UnitFormBase.pas' {FormBase},
  7.   UnitFormEntityBase in 'UnitFormEntityBase.pas' {FormEntityBase},
  8.   UnitFormMain in 'UnitFormMain.pas' {FormMain},
  9.   UnitObjectBase in 'UnitObjectBase.pas' {ObjectBase: TDataModule},
  10.   UnitObjectEntityBase in 'UnitObjectEntityBase.pas' {ObjectEntityBase: TDataModule},
  11.   UnitFormListBase in 'UnitFormListBase.pas' {FormListBase},
  12.   UnitObjectResultSetBase in 'UnitObjectResultSetBase.pas' {ObjectResultSetBase: TDataModule},
  13.   UnitFrameResultSetBase in 'UnitFrameResultSetBase.pas' {FrameResultSetBase: TFrame},
  14.   UnitFormListOrders in 'UnitFormListOrders.pas' {FormListOrders},
  15.   UnitFrameResultSetOrders in 'UnitFrameResultSetOrders.pas' {FrameResultSetOrders: TFrame},
  16.   UnitObjectResultSetOrders in 'UnitObjectResultSetOrders.pas' {ObjectResultSetOrders: TDataModule},
  17.   UnitFrameResultSetCustomer in 'UnitFrameResultSetCustomer.pas' {FrameResultSetCustomer: TFrame},
  18.   UnitFormListCustomer in 'UnitFormListCustomer.pas' {FormListCustomer},
  19.   UnitObjectResultSetCustomer in 'UnitObjectResultSetCustomer.pas' {ObjectResultSetCustomer: TDataModule},
  20.   UnitObjectEntityCustomer in 'UnitObjectEntityCustomer.pas' {ObjectEntityCustomer: TDataModule},
  21.   UnitFormEntityCustomer in 'UnitFormEntityCustomer.pas' {FormEntityCustomer},
  22.   UnitFormEntityOrders in 'UnitFormEntityOrders.pas' {FormEntityOrders},
  23.   UnitObjectEntityOrders in 'UnitObjectEntityOrders.pas' {ObjectEntityOrders: TDataModule};
  24.  
  25. {$R *.RES}
  26.  
  27. begin
  28.   Application.Initialize;
  29.   Application.CreateForm(TFormMain, FormMain);
  30.   Application.Run;
  31. end.
  32.